home *** CD-ROM | disk | FTP | other *** search
- object DirReport: TDirReport
- Left = 200
- Top = 149
- Width = 435
- Height = 300
- Caption = 'Report'
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Menu = MainMenu1
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Tree: TTreeView
- Left = 0
- Top = 0
- Width = 427
- Height = 254
- Indent = 19
- Align = alClient
- ParentColor = False
- TabOrder = 0
- end
- object MainMenu1: TMainMenu
- Left = 400
- object File1: TMenuItem
- Caption = '&File'
- ShortCut = 0
- object New1: TMenuItem
- Caption = '&New'
- ShortCut = 0
- OnClick = New1Click
- end
- object Open1: TMenuItem
- Caption = '&Open'
- ShortCut = 0
- OnClick = Open1Click
- end
- object InsertFile1: TMenuItem
- Caption = 'Insert File'
- Enabled = False
- ShortCut = 0
- end
- object Save1: TMenuItem
- Caption = '&Save'
- Enabled = False
- ShortCut = 0
- end
- object SaveAs1: TMenuItem
- Caption = 'Save &As'
- ShortCut = 0
- OnClick = SaveAs1Click
- end
- object Print1: TMenuItem
- Caption = 'Print'
- Enabled = False
- ShortCut = 0
- end
- object Exit1: TMenuItem
- Caption = 'E&xit'
- ShortCut = 0
- OnClick = Exit1Click
- end
- end
- object Edit1: TMenuItem
- Caption = '&Edit'
- Enabled = False
- ShortCut = 0
- object Delete1: TMenuItem
- Caption = '&Delete'
- ShortCut = 0
- end
- end
- object View1: TMenuItem
- Caption = '&Tree Depth'
- Enabled = False
- ShortCut = 0
- object RecursionLevel1: TMenuItem
- Caption = '&1'
- ShortCut = 0
- end
- object N21: TMenuItem
- Caption = '&2'
- ShortCut = 0
- end
- object N31: TMenuItem
- Caption = '&3'
- ShortCut = 0
- end
- object N41: TMenuItem
- Caption = '&4'
- ShortCut = 0
- end
- object Userdefined1: TMenuItem
- Caption = '&User defined...'
- ShortCut = 0
- end
- end
- end
- object SaveDialog1: TSaveDialog
- DefaultExt = '*.tree'
- FileEditStyle = fsEdit
- Filter = 'Tree files|*.tre'
- Title = 'Save tree as'
- Left = 368
- end
- object OpenDialog1: TOpenDialog
- DefaultExt = '*.tree'
- FileEditStyle = fsEdit
- Filter = 'Tree files|*.tre'
- Title = 'Open tree'
- Left = 336
- end
- end
-